home *** CD-ROM | disk | FTP | other *** search
/ Interactive Quarterly / The Best of New Machine Publishing 1 - Disc 4: Interactive Quarterly.iso / pc / demos / az / cyberx.dxr / 00103_ADELANTE.ls < prev    next >
Encoding:
Text File  |  1996-10-06  |  278 b   |  14 lines
  1. on mouseDown
  2.   puppetSprite(20, 1)
  3.   repeat while the mouseDown
  4.     if rollOver(20) then
  5.       set the castNum of sprite 20 to 2102
  6.       updateStage()
  7.       next repeat
  8.     end if
  9.     set the castNum of sprite 20 to 103
  10.     updateStage()
  11.   end repeat
  12.   puppetSprite(20, 0)
  13. end
  14.